(vc-bzr-revision-completion-table): Choose the right `:'.

diff --git a/lisp/vc-bzr.el b/lisp/vc-bzr.el
index a54cd7319f4d1cde07d2c381214d0289d207ff56..8e2ae86b4710024a6f1331b5b8c73e199a37b098 100644 (file)
--- a/lisp/vc-bzr.el
+++ b/lisp/vc-bzr.el
@@ -662,7 +662,7 @@ stream.  Standard error output is discarded."
         )
        ((eq (car-safe action) 'boundaries)
         (list* 'boundaries
-               (if (string-match ":" string) (1+ (match-beginning 0)))
+               (string-match "[^:]*\\'" string)
                (string-match ":" (cdr action))))
        (t
         ;; Could use completion-table-with-terminator, except that it